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module register (clock, reset, d, q); 
input clock, d, reset; 
output q; 
reg q; 

always@(posedge clock or negedge reset) 
if(effeset) 



endmodule 

module example; 
wire dl, d2, d3; 
wire ql, q2 t q3; 

reg sigin; 
wire sigout; 
reg elk, reset; 

register regl (elk, reset, dl, ql); 
register reg2 (elk, reset, d2, q2); 
register reg3 (elk, reset, d3, q3); 

assign dl = sigin A q3; 
assign d2 =* ql * q3; 
assign d3 = q2 * q3; 
assign sigout ■» q3; 

// a clock generator 

always 

begin 

elk - 0; 

#5; 

cUc « 1; 
#5; 

end 

// a signal generator 
always 
begin 
#10; 

sigin = $ random; 

end 

// initialization 

initial 

begin 

reset » 0; 

sigin * 0; 

#1; 

reset -1; 

$monitor($time, " %b, %b\ sigin, sigout); 
#1000 Srinish; 

end 

endmodule 
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module register (clock, reset, d, q); 
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output q; 
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// a signal generator 
always 
begin 

#10; 

sigin = Srandom; 
end 

// initialization 
initial 
begin 

reset = 0; 

sigin = 0; 

#1; 

reset = 1; 
#5 
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$monitor($time, ""/ob, %b", sigin, sigout); 1 Test -bench component (monitor) 

#1000$finish; J * 
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